If(b2>90;b2*91%;if(b2>60;b2*94%;if(b2>30;b2*97%;b2)))+$b$10




   



Function ahmed(x)


slecetcase (x)

Case Is > 90
ahmed = x * 0.91
Case Is > 60
ahmed = x * 0.94
Case Is > 30
ahmed = x * 0.97
Case Else
ahmed = x
End Select






End Function

        +$b$10